home *** CD-ROM | disk | FTP | other *** search
/ MacHack 1997 / MacHack 1997.toast / Hacks / Hacks ’96 / O Boy / Source / O Boy.c < prev    next >
C/C++ Source or Header  |  1996-06-21  |  3KB  |  161 lines
  1. // main file ... from the C.Spathis Shell (ty Gus)
  2. //
  3. #define __MAIN__
  4.  
  5. #include <quickdraw.h>
  6. #include <drag.h>
  7. #include <gestaltEqu.h>
  8. #include "O Boy.h"
  9. #include "OBoy_hi.h"
  10.  
  11. Boolean InitMacToolbox(void);
  12. Boolean InitApplication(void);
  13.  
  14. #define kMinSize    1
  15.  
  16. Boolean TrapAvailable(short tNumber,TrapType tType);
  17. long HeapNeeded(void);
  18. long StackNeeded(void);
  19.  
  20.  
  21.  
  22. void main(void)
  23. {
  24.     Boolean    done=FALSE;
  25.     
  26.     if (InitMacToolbox()){
  27.         if (InitApplication()){
  28.             while(!done){
  29.                 done=DoEvents();
  30.             }
  31.         }
  32.     }
  33.     ExitApp();
  34. }
  35. void ExitApp(void)
  36. {
  37.     
  38. }
  39. Boolean InitMacToolbox(void)
  40. {
  41.     Boolean    ret=TRUE;
  42.     SysEnvRec envRec;
  43.     long stkNeeded, heapSize;
  44.     long    response;
  45.     
  46.     // initialize Mac Toolbox components
  47.     InitGraf( &qd.thePort);
  48.     InitFonts();
  49.     InitWindows();
  50.     InitMenus();
  51.     TEInit();
  52.     InitDialogs(nil);
  53.     InitCursor();
  54.     
  55.     if (Gestalt(gestaltDragMgrAttr, &response) != noErr){
  56.         Draggable=false;
  57.     }else{
  58.         Draggable=true;
  59.     }        
  60.  
  61.     // ignore the error returned from SysEnvirons; even if an error occurred,
  62.     // the SysEnvirons glue will fill in the SysEnvRec
  63.     (void) SysEnvirons(curSysEnvVers, &envRec);
  64.     
  65.     // Are we running on a 128K ROM machine or better???
  66.     if (envRec.machineType < 0){
  67.         //BigBadError(kErrStrings,eWrongMachine);        // if not, alert & quit
  68.         ret=FALSE;
  69.     }
  70.  
  71.     // if we need more stack space, get it now
  72.     stkNeeded = StackNeeded(); 
  73.     if (stkNeeded > StackSpace()){
  74.         // new address is heap size + current stack - needed stack
  75.         SetApplLimit((Ptr) ((long) GetApplLimit() - stkNeeded + StackSpace()));
  76.     }
  77.  
  78.     // Check for minimum heap size
  79.     heapSize = (long) GetApplLimit() - (long) ApplicZone();
  80.     if (heapSize < HeapNeeded()){
  81.         //BigBadError(kErrStrings,eSmallSize);
  82.         ret=FALSE;
  83.     }
  84.  
  85.     // expand the heap so new code segments load at the top
  86.     MaxApplZone();
  87.     for (Int16 i = 1; i <= 101; i++) {
  88.         MoreMasters();
  89.     }
  90.  
  91.     bHaveWaitNextEvent = TrapAvailable(_WaitNextEvent, ToolTrap);
  92.  
  93.     return ret;
  94. }
  95. Boolean TrapAvailable(short tNumber,TrapType tType)
  96. {
  97.     // Check and see if the trap exists. On 64K ROM machines, tType will be ignored.
  98. #ifndef powerc
  99.     return NGetTrapAddress(tNumber, tType) != GetTrapAddress(_Unimplemented);
  100. #else
  101.     return true;
  102. #endif
  103. } 
  104.  
  105. Boolean InitApplication(void)
  106. {
  107.     Boolean    ret=TRUE;
  108.     Handle    menuBar;
  109.     
  110.     // read menus into menu bar
  111.     if ((menuBar = GetNewMBar(MAIN_MENU_BAR))!=nil){
  112.         // install menus
  113.         SetMenuBar(menuBar);
  114.         DisposHandle(menuBar);
  115.         // add DA names to Apple menu
  116.         AddResMenu(GetMHandle(APPLE_MENU), 'DRVR');
  117.         DrawMenuBar();
  118.         
  119.         sleepTime=10;
  120.         EventInit();
  121.          gSelfPSN.highLongOfPSN = 0;
  122.          gSelfPSN.lowLongOfPSN = kCurrentProcess;        //* Use this instead of GetCurrentProcess *//
  123.          if (AECreateDesc(typeProcessSerialNumber,(Ptr)&gSelfPSN,sizeof(ProcessSerialNumber),&gSelfAddress)!=0){
  124.              return FALSE;
  125.          }
  126.         gNullDesc.descriptorType = typeNull;        // Initialize the global null descriptor record.
  127.         gNullDesc.dataHandle = nil;
  128.         
  129.  
  130.         // gestalt check time
  131.         {
  132.             Int_32    theFeature;
  133.             if( Gestalt( gestaltFinderAttr, &theFeature ) == noErr )
  134.             {
  135.                 if( (theFeature & (1 << gestaltOSLCompliantFinder ) ) == 0 )
  136.                 {
  137.                     StopAlert( 130,nil );
  138.                     ret = FALSE;
  139.                 }
  140.             }
  141.         }
  142.  
  143.         if( ret == TRUE )
  144.         {
  145.             OBoy_hi    *theHumanInterface = new OBoy_hi;
  146.         }
  147.     }else{
  148.         ret=FALSE;
  149.     }
  150.     return ret;
  151. }
  152. long HeapNeeded(void)
  153. {
  154.     return (kMinSize * 1024);
  155. }
  156. long StackNeeded(void)
  157. {
  158.     return (kMinSize * 1024);
  159. }
  160.  
  161.